< Prev(J) / Next(K) > / View :

Filename: /text/sbasic/shared/03130800.xhp

(section: environ) (bookmark: bm_id3155364)
Environ function

Environ 関数

Environ Function [Runtime]
Environ 関数 [実行時](hd_id3155364.1)

Returns the value of an environment variable as a string. Environment variables are dependent on the type of operating system that you have.
環境変数の値を取得して、文字列として返します。どのような環境変数が存在するかは、使用するオペレーティングシステムに依存します。(par_id3145090.2)

(/section: environ)

Syntax:
構文:(hd_id3150670.4)

Environ (Environment As String)
Environ (Environment As String)(par_id3159176.5)

Return value:
戻り値:(hd_id3159157.6)

String
文字列(par_id3148473.7)

Parameters:
パラメータ:(hd_id3145609.8)

Environment: Environment variable that you want to return the value for.
Environment:値を取得する環境変数。(par_id3159414.9)

(embed text/sbasic/shared/00000003.xhp#errorcode : linkinfo)

Error Codes

エラーコード(hd_id3152869.37)

(/embed text/sbasic/shared/00000003.xhp#errorcode)

(embed text/sbasic/shared/00000003.xhp#err5 : linkinfo)

5 Invalid procedure call
5 無効なプロシージャー呼び出しです (par_id3150891.41)

(/embed text/sbasic/shared/00000003.xhp#err5)

Example:
例:(hd_id3148663.10)

Sub ExampleEnviron
Sub ExampleEnviron(par_id3149655.11)

Dim sTemp As String
Dim sTemp As String(par_id3154940.12)

sTemp=Environ ("TEMP")
sTemp=Environ ("TEMP")(par_id3148920.13)

If sTemp = "" Then sTemp=Environ("TMP")
If sTemp = "" Then sTemp=Environ("TMP")(par_id3150869.14)

MsgBox "'" & sTemp & "'" ,64,"Directory of temporary files:"
MsgBox "'" & sTemp & "'" ,64,"Directory of temporary files:"(par_id3145419.15)

End Sub
End Sub(par_id3154124.16)


< Prev / Next >